(require (planet schematics/schemeunit:3))

(check-=
 (/
  (+ 5 4 (- 2 (- 3 (+ 6 (/ 4 5)))))
  (* 3 (- 6 2) (- 2 7)))
 -0.2466
 0.0001)
